cd ./source
source tfmain.tcl